#Region "using directives"
Imports System
Imports System.Collections.Generic
Imports System.ComponentModel
Imports System.Data
Imports System.Drawing
Imports System.Text
Imports System.Windows.Forms
#End Region
Namespace MapiApplication
	Public Partial Class CopyProfile
	Inherits Form
		#Region "Constructors"
		Public Sub New()
		End Sub
		Public Sub New(ByVal selectedProfile As String)
			InitializeComponent()
			lblExistingProfileCopyProfile.Text = selectedProfile
		End Sub
		#End Region
		#Region "Helper Methods"
		Public ReadOnly Property TbxBoxValue() As String
			Get
				Return Me.tbxCopyProfileName.Text
			End Get
		End Property
		#End Region
		#Region "Event Handlers"
        Private Sub tbxCopyProfileName_TextChanged(ByVal sender As Object, ByVal e As EventArgs) Handles tbxCopyProfileName.TextChanged
            If tbxCopyProfileName.Text IsNot Nothing Then
                btnOkCopyProfile.Enabled = True
            Else
                btnOkCopyProfile.Enabled = False
            End If
        End Sub
        Private Sub CopyProfile_KeyDown(ByVal sender As Object, ByVal e As KeyEventArgs) Handles MyBase.KeyDown
            If e.KeyCode = Keys.Escape Then
                Me.Close()
            End If
        End Sub
		#End Region

      
    End Class
End Namespace
